home *** CD-ROM | disk | FTP | other *** search
/ Computer Select (Limited Edition) / Computer Select.iso / pcc / v04n11 / batch1.exe / KTCHSINK.BAT < prev    next >
Encoding:
DOS Batch File  |  1991-09-17  |  1.2 KB  |  42 lines
  1. @ECHO OFF
  2. REM This is KTCHSINK.BAT
  3. IF %1!==! GOTO OOPS
  4. FOR %%A IN (bd BD Bd) DO IF %1!==%%A! GOTO BDY
  5. IF NOT %2!==! GOTO NUM
  6. ECHO 0 PRINT "ASCII value: "; > FILE.BAS
  7. ECHO 1 PRINT ASC("%1")  >> FILE.BAS
  8. GOTO REST
  9. :BDY
  10. ECHO 0 PLAY "O3 C8 C8 D C F E2 C8 C8 D"  > FILE.BAS
  11. ECHO 1 PLAY "C G F2 C8 C8 O4 C O3 A F"  >> FILE.BAS
  12. ECHO 2 PLAY "E D2 T90 B-8 B-8 A F G F C" >> FILE.BAS
  13. GOTO REST
  14. :NUM
  15. ECHO 0 PRINT "The answer is: "; > FILE.BAS
  16. ECHO 1 PRINT %1 %2 %3 >> FILE.BAS
  17. :REST
  18. ECHO 3 SYSTEM >> FILE.BAS
  19. REM Substitute QBASIC /RUN or GWBASIC in place 
  20. REM of BASICA in the line below if necessary!
  21. QBASIC /RUN FILE.BAS
  22. DEL FILE.BAS
  23. GOTO END
  24. :OOPS
  25. ECHO Enter two numbers with a math operator
  26. ECHO between them, e.g., 3 + 4  or  22 / 7
  27. ECHO or 2 ^ 20  or  5 * 5
  28. ECHO.
  29. ECHO Or enter a function operator followed
  30. ECHO by a number in parentheses, e.g., SIN (4) 
  31. ECHO Or try ATN (arctangent), SQR (sq. root),
  32. ECHO EXP (e to that power), LOG, COS, or TAN.
  33. ECHO.
  34. ECHO Or enter HEX$ or OCT$ followed by a number
  35. ECHO in parentheses for the hex or octal value
  36. ECHO.
  37. ECHO Or just enter %0 followed by one letter or
  38. ECHO number to get its ASCII value.
  39. ECHO.
  40. ECHO Or enter %0 BD to play Happy Birthday
  41. :END
  42.